home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / ggetvi1r / frmmain.frm < prev    next >
Text File  |  1999-05-28  |  29KB  |  740 lines
  1. VERSION 5.00
  2. Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "comdlg32.ocx"
  3. Object = "{38911DA0-E448-11D0-84A3-00DD01104159}#1.1#0"; "COMCT332.OCX"
  4. Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "Mscomctl.ocx"
  5. Object = "{86CF1D34-0C5F-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCT2.OCX"
  6. Begin VB.Form frmMain 
  7.    AutoRedraw      =   -1  'True
  8.    Caption         =   "Transparency/Translucency Mask and Image Creator"
  9.    ClientHeight    =   4350
  10.    ClientLeft      =   165
  11.    ClientTop       =   720
  12.    ClientWidth     =   7065
  13.    Icon            =   "frmMain.frx":0000
  14.    LinkTopic       =   "Form1"
  15.    MinButton       =   0   'False
  16.    ScaleHeight     =   290
  17.    ScaleMode       =   3  'Pixel
  18.    ScaleWidth      =   471
  19.    StartUpPosition =   3  'Windows Default
  20.    Begin VB.PictureBox pImageView 
  21.       Align           =   1  'Align Top
  22.       AutoRedraw      =   -1  'True
  23.       BackColor       =   &H00800000&
  24.       BorderStyle     =   0  'None
  25.       Height          =   3105
  26.       Left            =   0
  27.       ScaleHeight     =   207
  28.       ScaleMode       =   3  'Pixel
  29.       ScaleWidth      =   471
  30.       TabIndex        =   4
  31.       Top             =   1245
  32.       Width           =   7065
  33.    End
  34.    Begin MSComDlg.CommonDialog cDia 
  35.       Left            =   2700
  36.       Top             =   1860
  37.       _ExtentX        =   847
  38.       _ExtentY        =   847
  39.       _Version        =   393216
  40.       CancelError     =   -1  'True
  41.       DialogTitle     =   "Select Image"
  42.       Filter          =   "Bitmap Files (*.bmp)|*.bmp"
  43.       Flags           =   4
  44.    End
  45.    Begin ComCtl3.CoolBar cbTB 
  46.       Align           =   1  'Align Top
  47.       Height          =   1245
  48.       Left            =   0
  49.       TabIndex        =   0
  50.       Top             =   0
  51.       Width           =   7065
  52.       _ExtentX        =   12462
  53.       _ExtentY        =   2196
  54.       FixedOrder      =   -1  'True
  55.       _CBWidth        =   7065
  56.       _CBHeight       =   1245
  57.       _Version        =   "6.0.8169"
  58.       Child1          =   "tbGen"
  59.       MinHeight1      =   26
  60.       Width1          =   7
  61.       NewRow1         =   0   'False
  62.       Child2          =   "pOptions"
  63.       MinHeight2      =   23
  64.       Width2          =   9
  65.       NewRow2         =   -1  'True
  66.       Child3          =   "tbView"
  67.       MinHeight3      =   26
  68.       Width3          =   7
  69.       NewRow3         =   -1  'True
  70.       Begin VB.PictureBox pOptions 
  71.          BorderStyle     =   0  'None
  72.          Height          =   345
  73.          Left            =   165
  74.          ScaleHeight     =   23
  75.          ScaleMode       =   3  'Pixel
  76.          ScaleWidth      =   454
  77.          TabIndex        =   12
  78.          Top             =   450
  79.          Width           =   6810
  80.          Begin VB.ComboBox cboStyle 
  81.             Height          =   315
  82.             ItemData        =   "frmMain.frx":014A
  83.             Left            =   3450
  84.             List            =   "frmMain.frx":0154
  85.             Style           =   2  'Dropdown List
  86.             TabIndex        =   15
  87.             Top             =   30
  88.             Width           =   2115
  89.          End
  90.          Begin VB.CheckBox chkUseTransL 
  91.             Caption         =   "Use Translucency"
  92.             Height          =   255
  93.             Left            =   1710
  94.             TabIndex        =   14
  95.             Top             =   60
  96.             Value           =   1  'Checked
  97.             Width           =   1635
  98.          End
  99.          Begin VB.CheckBox chkUseTransP 
  100.             Caption         =   "Use Transparency"
  101.             Height          =   255
  102.             Left            =   0
  103.             TabIndex        =   13
  104.             Top             =   60
  105.             Value           =   1  'Checked
  106.             Width           =   1635
  107.          End
  108.       End
  109.       Begin MSComctlLib.Toolbar tbView 
  110.          Height          =   390
  111.          Left            =   165
  112.          TabIndex        =   3
  113.          Top             =   825
  114.          Width           =   6810
  115.          _ExtentX        =   12012
  116.          _ExtentY        =   688
  117.          ButtonWidth     =   609
  118.          ButtonHeight    =   582
  119.          ImageList       =   "imlToolbarIcons(1)"
  120.          _Version        =   393216
  121.          BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628} 
  122.             NumButtons      =   4
  123.             BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  124.                Enabled         =   0   'False
  125.                Key             =   "Starting Image"
  126.                Object.ToolTipText     =   "View Starting Image"
  127.                ImageKey        =   "cimage"
  128.                Style           =   2
  129.                Value           =   1
  130.             EndProperty
  131.             BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  132.                Enabled         =   0   'False
  133.                Key             =   "Compiled Image"
  134.                Object.ToolTipText     =   "View Compiled Image"
  135.                ImageKey        =   "cimage2"
  136.                Style           =   2
  137.             EndProperty
  138.             BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  139.                Enabled         =   0   'False
  140.                Key             =   "Mask"
  141.                Object.ToolTipText     =   "View Mask"
  142.                ImageKey        =   "cmask"
  143.                Style           =   2
  144.             EndProperty
  145.             BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  146.                Enabled         =   0   'False
  147.                Key             =   "Put-together Image"
  148.                Object.ToolTipText     =   "View Put-together Image"
  149.                ImageKey        =   "finished"
  150.                Style           =   2
  151.             EndProperty
  152.          EndProperty
  153.       End
  154.       Begin MSComctlLib.Toolbar tbGen 
  155.          Height          =   390
  156.          Left            =   30
  157.          TabIndex        =   1
  158.          Top             =   30
  159.          Width           =   6945
  160.          _ExtentX        =   12250
  161.          _ExtentY        =   688
  162.          ButtonWidth     =   609
  163.          ButtonHeight    =   582
  164.          ImageList       =   "imlToolbarIcons(0)"
  165.          _Version        =   393216
  166.          BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628} 
  167.             NumButtons      =   10
  168.             BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  169.                Key             =   "Open"
  170.                Object.ToolTipText     =   "Open"
  171.                ImageKey        =   "Open"
  172.             EndProperty
  173.             BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  174.                Key             =   "Save"
  175.                Object.ToolTipText     =   "Save"
  176.                ImageKey        =   "Save"
  177.             EndProperty
  178.             BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  179.                Style           =   3
  180.             EndProperty
  181.             BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  182.                Enabled         =   0   'False
  183.                Key             =   "Compile"
  184.                Object.ToolTipText     =   "Compile Images"
  185.                ImageKey        =   "Compile"
  186.             EndProperty
  187.             BeginProperty Button5 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  188.                Style           =   3
  189.             EndProperty
  190.             BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  191.                Key             =   "TransPColorPH"
  192.                Style           =   4
  193.                Object.Width           =   1635
  194.             EndProperty
  195.             BeginProperty Button7 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  196.                Style           =   3
  197.             EndProperty
  198.             BeginProperty Button8 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  199.                Key             =   "TransLColorPH"
  200.                Style           =   4
  201.                Object.Width           =   1635
  202.             EndProperty
  203.             BeginProperty Button9 {66833FEA-8583-11D1-B16A-00C0F0283628} 
  204.                Style           =   3
  205.